object Locate_Example: TLocate_Example Left = 252 Top = 112 Width = 328 Height = 304 ActiveControl = DBGrid1 Caption = 'Locate Example' Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] PixelsPerInch = 96 TextHeight = 16 object Shape1: TShape Left = 0 Top = 239 Width = 320 Height = 36 end object Label1: TLabel Left = 18 Top = 83 Width = 109 Height = 16 Caption = 'Mfg to search for' end object Label2: TLabel Left = 58 Top = 247 Width = 234 Height = 24 Caption = '"All Freeware On Sale!"' Color = clWhite Font.Color = clMaroon Font.Height = -21 Font.Name = 'Arial' Font.Style = [fsBold] ParentColor = False ParentFont = False end object Image1: TImage Left = 6 Top = 242 Width = 32 Height = 32 AutoSize = True Picture.Data = {} end object Label3: TLabel Left = 34 Top = 7 Width = 252 Height = 22 Caption = 'Homer'#39's Discount Software' Font.Color = clNavy Font.Height = -19 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Edit1: TEdit Left = 131 Top = 81 Width = 172 Height = 22 Font.Color = clBlack Font.Height = -12 Font.Name = 'Arial' Font.Style = [] MaxLength = 30 ParentFont = False TabOrder = 1 end object Button1: TButton Left = 228 Top = 48 Width = 76 Height = 25 Caption = 'Locate' TabOrder = 2 OnClick = Button1Click end object DBGrid1: TDBGrid Left = 18 Top = 114 Width = 285 Height = 105 DataSource = DataSource1 TabOrder = 0 TitleFont.Color = clWindowText TitleFont.Height = -13 TitleFont.Name = 'System' TitleFont.Style = [] end object Table1: TTable Active = True DatabaseName = 'ayf' TableName = 'SOFTWARE.DB' Left = 17 Top = 42 end object DataSource1: TDataSource AutoEdit = False DataSet = Table1 Left = 48 Top = 42 end end